#pragma once
#include <iostream>
#include <string>
#include <cerrno>
#include <cstring>
#include <sys/types.h>
#include <sys/socket.h>
#include <netinet/in.h>
#include <unistd.h>
#include <signal.h>
#include <unordered_map>
#include <pthread.h>
#include <arpa/inet.h>
#include <functional>
#include <sys/wait.h>
#include "Log.hpp"
#include "Comm.hpp"
#include "nocopy.hpp"
#include "InetAddr.hpp"
#include "Threadpool.hpp"
//#include "Task.hpp"
const static int default_backlog = 5;

using task_t = std::function<void()>;
using callback_t = std::function<void(int,InetAddr&)>;

class Tcpserver;
// class ThreadData
// {
// public:
//     ThreadData(int sock,Tcpserver *ptr,struct sockaddr_in &peer) 
//     : _sockfd(sock),svr_ptr(ptr),addr(peer)
//     {} 
//     ~ThreadData()
//     {
//         close(_sockfd);
//     }
//     int sockfd()
//     {
//         return _sockfd;
//     }
//     Tcpserver* ptr()
//     {
//         return svr_ptr;
//     }

// private:
//     int _sockfd;
//     Tcpserver* svr_ptr;
// public:
//     InetAddr addr;
// };

class Tcpserver : public nocopy
{
public:
    Tcpserver(uint16_t port) : _port(port), _isrunning(false)
    {
    }
    void Init()
    {
        // 创建套接字，文件描述符
        _listensock = socket(AF_INET, SOCK_STREAM, 0); // 创建网络通信文件
        if (_listensock < 0)
        {
            lg.LogMessage(Fatal, "Socket erro ,%d : %s", errno, strerror(errno));
            exit(Fatal);
        }
        // 解决一些少量bind失败问题
        int opt = 1;
        setsockopt(_listensock, SOL_SOCKET, SO_REUSEADDR | SO_REUSEPORT, &opt, sizeof(opt));

        lg.LogMessage(Debug, "create socket success,sock:%d", _listensock);
        // 2.填充网络信息绑定
        struct sockaddr_in local;
        memset(&local, 0, sizeof(local));
        local.sin_family = AF_INET;
        local.sin_port = htons(_port); // 主机序列转成网络序列
        local.sin_addr.s_addr = htonl(INADDR_ANY);
        // 绑定
        if (bind(_listensock, (struct sockaddr *)&local, sizeof(local)) != 0)
        {
            lg.LogMessage(Fatal, "bind erro ,%d : %s", errno, strerror(errno));
            exit(bind_erro);
        }
        lg.LogMessage(Debug, "create bind success,sock:%d", _listensock);
        // 设置监听状态
        if (listen(_listensock, default_backlog) != 0)
        {
            lg.LogMessage(Fatal, "bind erro ,%d : %s", errno, strerror(errno));
            exit(listen_erro);
        }
        lg.LogMessage(Debug, "listen bind success,sock:%d", _listensock);
    }
    // void Service(int sockfd)
    // {
    //     char buffer[1024]; // 字符数组没有‘\0’
    //     while (true)
    //     {
    //         ssize_t n = read(sockfd, buffer, sizeof(buffer) - 1); // 留出最后一个空间'\0'
    //         if (n > 0)
    //         {
    //             buffer[n] = 0; // 给末尾添加‘\0’,终止字符串信息
    //             std::cout << "client say:" << buffer << std::endl;

    //             std::string echo_string = "sever echo:";
    //             echo_string += buffer;
    //             write(sockfd, echo_string.c_str(), echo_string.size());
    //         }
    //         else if (n == 0) // 对方关闭了连接
    //         {
    //             lg.LogMessage(Info, "clinet quit\n");
    //             break;
    //         }
    //         else
    //         {
    //             lg.LogMessage(Error, "read socket error\n");
    //             break;
    //         }
    //     }
    // }
    void Service(int sockfd,InetAddr& addr)
    {
        char buffer[1024]; // 字符数组没有‘\0’
        while (true)
        {
            ssize_t n = read(sockfd, buffer, sizeof(buffer) - 1); // 留出最后一个空间'\0'
            if (n > 0)
            {
                buffer[n] = 0; // 给末尾添加‘\0’,终止字符串信息
                std::cout << addr.PrintDebug() << " client say:" << buffer << std::endl;

                std::string echo_string = "sever echo:";
                echo_string += buffer;
                write(sockfd, echo_string.c_str(), echo_string.size());
            }
            else if (n == 0) // 对方关闭了连接
            {
                lg.LogMessage(Info, "clinet quit\n");
                break;
            }
            else
            {
                lg.LogMessage(Error, "read socket error\n");
                break;
            }
        }
    }
    // static void *HandlerRequest(void *args) // 因为类内函数包含this指针
    // {
    //     pthread_detach(pthread_self());
    //     ThreadData *td = static_cast<ThreadData *>(args);

    //     td->ptr()->Service(td->sockfd(),td->addr);

    //     delete td;
    //     return nullptr;
    // }

    void Start()
    {
        _isrunning = true;
        signal(SIGCHLD, SIG_IGN);
        while (true)
        {
            // 4.获取连接
            struct sockaddr_in peer;
            socklen_t len = sizeof(peer);
            int sockfd = accept(_listensock, (struct sockaddr *)&peer, &len);
            if (sockfd < 0)
            {
                lg.LogMessage(Warning, "accept socket error,error code:%d,error string:%s", errno, strerror(errno));
                continue;
            }
            lg.LogMessage(Debug, "accept success,get n new sockfd:%d\n", sockfd);

            // 5.提供服务

            // Service(sockfd);
            // close(sockfd);

            // 多进程
            // pid_t id = fork();
            // if (id < 0)
            // {
            //     close(sockfd);
            //     continue;
            // }
            // else if (id == 0)
            // {
            //     close(_listensock);
            //     if (fork() > 0)
            //         exit(0);

            //     //孙子进程，去处理
            //     Service(sockfd);
            //     close(sockfd);
            // }
            // else
            // {
            //     close(sockfd);
            //     pid_t rid = waitpid(id, nullptr, 0);
            //     if (rid == id)
            //     {
            //     }
            // }
            // 多进程 信号版

            // pid_t id = fork();
            // if (id < 0)
            // {
            //     close(sockfd);
            //     continue;
            // }
            // else if (id == 0)
            // {
            //     close(_listensock);
            //     Service(sockfd);
            //     close(sockfd);
            //     exit(0);
            // }
            // else
            // {
            //     close(sockfd);
            // }

            // ThreadData *td = new ThreadData(sockfd,this,peer);
            // // 多线程  主线程+新线程
            // pthread_t tid;
            // pthread_create(&tid, nullptr, HandlerRequest, td);
            // 主线程和新线程共用一份地址空间

            //5.线程池 --不能让我们服务器，提供长服务
            InetAddr addr(peer);
            task_t t = std::bind(&Tcpserver::Routine,this,sockfd,addr);
            Threadss::ThreadPool<task_t>::GetInstance()->Start();
            Threadss::ThreadPool<task_t>::GetInstance()->Push(t);

        }
    }
    std::string Read(int sockfd)
    {
        char buffer[1024];
         ssize_t n = read(sockfd, buffer, sizeof(buffer) - 1); // 留出最后一个空间'\0'
            if (n > 0)
            {
                buffer[n] = 0; // 给末尾添加‘\0’,终止字符串信息
            }
            else if (n == 0) // 对方关闭了连接
            {
                lg.LogMessage(Info, "clinet quit\n");
            }
            else
            {
                lg.LogMessage(Error, "read socket error\n");
            }
        return buffer;
    }
    void Routine(int sockfd,InetAddr addr)
    {
        std::string type = Read(sockfd);
        lg.LogMessage(Debug,"%s selsect %s\n",addr.PrintDebug().c_str(),type.c_str());
        if(type == "ping")
            _funs[type](sockfd,addr);
        else if(type == "translate")
            _funs[type](sockfd,addr);
        else if(type == "transform")
            _funs[type](sockfd,addr);
        else
            _funs["default"](sockfd,addr);
        close(sockfd);

    }
    void RegisterFunc(const std::string &name,callback_t func)
    {
        _funs[name] = func;
    }
    ~Tcpserver()
    {
    }

private:
    uint16_t _port;
    int _listensock;
    bool _isrunning;

    //构建任务
    std::unordered_map<std::string,callback_t> _funs;
};
